LISP[GEM,HE]+MN[GEM,HE]+<GEOMED[GEM,HE],; GEMSUB[GEM,HE],MEMIO[GEM,HE],EULER[GEM,HE],; EUCLID[GEM,HE],VIEWER[GEM,HE],OCCULT[GEM,HE],BIN[GEM,HE]>,; GEOMEL[GEM,HE]